perm filename E.DIF[E,ALS]10 blob
sn#228361 filedate 1976-07-30 generic text, type T, neo UTF8
1) EX vs. 2) EY SRCCOM 07-30-76 07:58 PAGES 1,1
******** EX **** PAGE 17 LINE 16
1) ,<INSERT,↑INSCMD::NOATT!NORDO>,<JFILL,SACMD>,<JGET,SACMD>
1) ,<JJSEPARATE,SACMD>,<JOIN,SACMD>,<JSEPARATE,SACMD>
*** EY *** PAGE 17 LINE 16
2) ,<INSERT,↑INSCMD::NOATT!NORDO>,<JDISABLE,SACMD>,<JFILL,SACMD>,<JGET,SACMD>
2) ,<JJSEPARATE,SACMD>,<JOIN,SACMD>,<JSEPARATE,SACMD>
******** EX **** PAGE 219 LINE 10
1) MOVE A,B
1) ADD A,[440700,,LLDESC]
1) TRZ F,REL ;Means no new par.
1) MOVE T,A ;We will have to test new line indent
*** EY *** PAGE 219 LINE 10
2) TRZ F,REL ;Means no new par.
2) TLNN F,TF2 ;Was it a TJ command?
2) SKIPE JGETFL# ;Or was JGETFL set by the JGET command?
2) SKIPA ;Yes
2) POPJ P,
2) MOVE A,B
2) ADD A,[440700,,LLDESC]
2) MOVE T,A ;We will have to test new line indent
******** EX **** PAGE 224 LINE 126
1) ;Get typed-in margins from the specified text.
1) JGET: JUMPE A,JGET4
1) MOVSI Q,-4
*** EY *** PAGE 224 LINE 126
2) ; Disable use of indent as a new par. indicator
2) JDISAB: SETZM JGETFL
2) OUTSTR [ASCIZ/ JGET priming is disabled./]
2) POPJ P,
2) ;Get typed-in margins from the specified text.
2) JGET: JUMPE A,JGET4
2) SETOM JGETFL ;Set flag so indent will be used as par. indicator
2) MOVSI Q,-4